home *** CD-ROM | disk | FTP | other *** search
/ Scene Storm / Scene Storm - Volume 1.iso / coding / c / amiexpress / source / ae / code / ax3.00 / getfilecomment.c < prev    next >
Encoding:
C/C++ Source or Header  |  1980-01-03  |  484 b   |  33 lines
  1. #include "bbs.h"
  2. STRPTR GetFileComment(char *str)
  3. {
  4. char cmt[250];
  5. struct FileInfoBlock *FBlock;
  6. BPTR FLock;
  7.  
  8. /*
  9. DTBT=0;
  10. TBT=0;
  11. TTTM=NULL;
  12. TTEFF=NULL;
  13. TTCPS=NULL;*/
  14. strcpy(cmt,"");
  15. if(FBlock=(struct FileInfoBlock *)AllocDosObject(DOS_FIB,NULL))
  16.     {
  17.     if(FLock=Lock(str,ACCESS_READ))
  18.         {
  19.         if(Examine(FLock,FBlock))
  20.             {
  21.             if(FBlock->fib_Comment[0]!='\0')
  22.                 {
  23.                 strcpy(cmt,FBlock->fib_Comment);
  24.                 }
  25.             }
  26.         UnLock(FLock);
  27.         }
  28.     FreeDosObject(DOS_FIB,FBlock);
  29.     }
  30.     return(cmt);
  31. }
  32.  
  33.